$HOME_DIR = "/home/limura";
$HOME_DIR .= "/". $ENV{'QUERY_STRING'} if($ENV{'QUERY_STRING'} ne '');
$ENV{'CHOPSET_HOME'} = $HOME_DIR;
$|=1;
print("Content-Type: application/octet-stream\r\n\r\n");

unless(chdir($HOME_DIR)){
	print("failed.\ncan not chdir to '$HOME_DIR'");
	exit(0);
}
1;
